Top 10k strings from Pacific War (1984)(CCS).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TAP] /
Back to the directory listing
7 A$(PT+Z)="C"
5 A$(PT+R)=" "
4 MAPOS=MAPOS+2048
4 DISPL=DISP-(DISPH*Z5)
4 BYTEL=BYTE-(BYTEH*Z5)
4 A$(PT)="2"
4 A$(PT)="1"
4 A$(PM)=" "
4 ,V;"...";A$(PT+Q
4 (DISP/Z5):
4 "PRESS ENTER";Q$
3 V)=T$(N,Y1
3 PT=O*Y1-Z:
3 PP+T)=T$(N,Y1
3 A$(PS+W+M)+PS
3 A$(PS+V+M)="1"
2 T$(N,S)<X1
2 T$(N,Q3)="0"
2 PT1);" SUNK...":
2 PT1);" HIT...":
2 PP+V)=T$(N,Y1
2 LOSS=LOSS+AS
2 DISP=BYTE-40912
2 DISP=BYTE-34000
2 B|<x~@<B><B~BB<@<B<
2 BD@BFB@JDB
2 A$(PT+Y1)=
2 A$(PT+Y1)<
2 A$(PT+Y1)+Z)
2 A$(PS+Y1)+PS:
2 A$(PS+Y1)+PS
2 A$(PS+X1)=
2 A$(PS+W+M)+PS:
2 A$(PS+W)*Y1
2 A$(PS+V+M)=" "
2 A$(PM+Z)*X1)
2 A$(PM+COUNT)=
2 A$(PH+Z);" "
2 ;"TASK FORCE ";
2 ;"ON COMPLETION ENTER 0"
2 8888888888888888888888888888888888888888888888888888888888888888
2 1TRANSPORT6
2 ,R;"END OF COMBAT":
2 (BYTE/Z5):
2 "JAPANESE TASK FORCE STATUS"
2 "CONTINUE LOADING"
1 Z4,Z1;"ENTER NUMBER OF AIRCRAFT C.A.P."
1 Z4,Z1;" ENTER NUMBER OF AIRCRAFT "
1 X1)=T$(N,U
1 V)=T$(Q,Y1
1 V)=T$(N,Q1
1 V)=T$(N+U,Y1
1 V$(O)-X1):
1 V$(N)-N1))
1 T)=T$(Q,Y1
1 T)=T$(O,Y1
1 T)=T$(N,Y1
1 T)=T$(N+U,Y1
1 T)=T$(N+U,W
1 T)=T$(I+U,Y1
1 T$(O,Z)=" "
1 T$(N,W)=T$(N,Y1):
1 T$(N,W)+I1)
1 T$(N,V)=T$(N,X1):
1 T$(N,V)+I2)
1 T$(N,S)>Y1
1 T$(N,S)=Y1
1 T$(N,R)<X1
1 T$(N,Q3)="1"
1 T$(N+U,Z)=
1 T$(N+U,Y1)=
1 T$(N+U,X1)=
1 T$(N+U,W)=
1 T$(N+U,V)=
1 T$(I+U,Y1)):
1 T$(I+U,X1))
1 SOLOMONS
1 S$(BYP,BYP1+Z)
1 S$(BYP,BYP1):
1 Q2)=T$(N,W
1 PP1=PP1+Z:
1 PP+V)=T$(O,Y1
1 PP+T)=" ":
1 PACWAR
1 P$(PT)*Z5+
1 MCODE /;
1 MAPOS=57296
1 MAPOS=50384
1 L$(A1,BYP+Z)
1 L$(A1,BYP+Y1)
1 JSC=JSC+Z:
1 JSC=JSC+X1
1 JSC=JSC+AIR
1 JSC=JSC+65
1 JSC=JSC+45
1 JSC=JSC+20
1 JEND=JEND+Z
1 FLEET CARRIERLIGHT CARRIERCRUISER BATTLESHIP TRANSPORT
1 FIGHTERS TORPEDO PLANESDIVE BOMBERS
1 D(Z)>D(I+Z)
1 D(Z)=D(I+Z)
1 D(I)>D(I+Z)
1 D(I)=DIS1:
1 COUNT=COUNT+Y1
1 BYP=BYP+Y1:
1 ASC=ASC+Z:
1 ASC=ASC+I1
1 ASC=ASC+45
1 ASC=ASC+30
1 AIRCRAFT ONBOARD
1 AEND=AEND+Z
1 ACP=(A1-X)+(B1-Y)
1 A$(PT+Y1)>Y1
1 A$(PT+T)),
1 A$(PS+Z)-I1)
1 A$(PS+Z)*Y1
1 A$(PS+X1)>Z1
1 A$(PS+X1):
1 A$(PS+X1)-Z)
1 A$(PS+X1)+Z)
1 A$(PP+X1)=E$:
1 A$(PP+X1)="S":
1 A$(PP+X1)="A"
1 A$(PP+V);"
1 A$(PP+U)=X
1 A$(PP+T)=Y
1 A$(PM+Z)+N1):
1 A$(PM+Z)*T)+
1 A$(PM+COUNT)-Z)
1 A$(PM)="F"
1 A$(PH+Z)<N1-
1 A$(PH+Z)<N1
1 A$(PH+Z)-N1)
1 A$(PH+Z)-(N1-
1 A$(PH+Z)+(
1 A$(P+Y1)<Y1
1 A$(P+Y1);" HIT(S)":
1 A$(P+U)-U:
1 A$(P+R)=" "
1 @1SARATOGA
1 @1ENTERPRISE
1 @ HENDERSON FIELD
1 =AIRSTRIKE
1 ;"WELCOME TO PACIFIC WAR"
1 ;"VICTORY POINTS":
1 ;"TIME FOR A WELL EARNED CUP OFCOFFEE OR A BOURBON PERHAPS ! ":
1 ;"TAKE OFF PHASE NO. ";OT-1
1 ;"START POSTION AREAS"
1 ;"SET TARGET
1 ;"RESIGN ADMIRAL !"
1 ;"Press any key to continue"
1 ;"PUBLISHED BY ";
1 ;"OP-TURN ";OT:
1 ;"JAPANESE SHIPS MOVING"
1 ;"ENTER GAME LEVEL"
1 ;"ENTER CODE OF AIRCRAFT
1 ;"COPYRIGHT WARNING"
1 ;"CONGRATULATIONS ADMIRAL !"
1 ;"BATTLE","OVER"
1 ;"BATTLE OF THE EASTERN SOLOMONS"
1 ;"AIR ATTACK ON ENEMY TASK FORCE ";
1 ;" HAS ENDED"
1 ;" AIR MISSION LIMIT EXCEEDED ":
1 ;" ENTER TYPE OF MISSION "
1 1SAN FRANCISCO3
1 1SALT LAKE CITY3
1 1PORTLAND3
1 1NORTH CAROLINA3
1 1MINNEAPOLIS3
1 ,Z1;"PRESS ENTER"
1 ,Z1;"ENEMY AIR ATTACK ON TASK FORCE ";
1 ,Z1;" "
1 ,Z1;" "
1 ,Y1;"HENDERSON FIELD OUT OF ACTION":
1 ,Y1;"ENEMY SEARCH AIRCRAFT SIGHTED":
1 ,X1;"SET START POSITION FOR TF";N
1 ,X1;"GAME TURN ";GT;
1 ,V;"REINFORCEMENTS LANDING":
1 ,V;"...NO HITS REPORTED...":
1 ,U;I1;" AIRCRAFT SHOT DOWN":
1 ,U;AIR;" AIRCRAFT SHOT DOWN":
1 ,U;"TASK FORCE MOVEMENT":
1 ,T;"AIRCRAFT MOVEMENT":
1 ,S;"...NO HITS REPORTED...":
1 ,,,,"CASES COMPUTER SIMULATIONS LTD ":
1 *(DIST))+Z
1 (SAA/AA*Y1)
1 ("COURSE CHANGE TF";N;"
1 "will rigorously protect the":
1 "software is strictly prohibited."
1 "hiring, and lending of this":
1 "copyright, of PACIFIC WAR.":
1 "TO PLAY AGAIN PLEASE RELOAD THE PROGRAM.":
1 "SOLOMONS"
1 "Please note unauthorised copying":
1 "PRESS ENTER":
1 "JAPANESE","AMERICAN":
1 "GAME TURN ";GT,"OP-TURN NO.";OT:
1 "DAMAGE ";
1 "AMERICAN TASK FORCE STATUS"
1 "AIR MISSIONS AVAILABLE=";
1 TRANSPORT1C
1 SAN JUAN5C
1 NEW ORLEANS1C
1 KW SOFTWARE 1983
1 END PRESS 0"
1 ATLANTA2C
1 1983 Ken.Wright. "
1 Q
1